﻿Namespace Reports

    Public Class R_02_00701
        Public Sub CreateDataBindings()

            Me.XrTableCell_PurchaseID.DataBindings.Add("Text", Me.DataSource, "PURCHASE_ID")
            Me.XrTableCell_PurchaseQuantity.DataBindings.Add("Text", Me.DataSource, "PURCHASE_QUANTITY")
            Me.XrTableCell_AssetName.DataBindings.Add("Text", Me.DataSource, "ASSET_NAME")
            Me.XrTableCell_TargetLocation.DataBindings.Add("Text", Me.DataSource, "TARGET_LOCATION")
            Me.XrTableCell_Owner.DataBindings.Add("Text", Me.DataSource, "OWNER__OWNER_NAME")
            Me.XrTableCell_CreatorStaffName.DataBindings.Add("Text", Me.DataSource, "CREATOR__STAFF_NAME")
            Me.XrTableCell_CreateDate.DataBindings.Add("Text", Me.DataSource, "CREATE_DATE")
            Me.XrTableCell_PurchasepriceTotal.DataBindings.Add("Text", Me.DataSource, "PURCHASE_PRICE_TOTAL")
            Me.XrTableCell_PrincipalStaffName.DataBindings.Add("Text", Me.DataSource, "PRINCIPAL__STAFF_NAME")
            Me.XrTableCell_ExcutorStaffName.DataBindings.Add("Text", Me.DataSource, "EXECUTOR__STAFF_NAME")
            Me.XrTableCell_PurchasePrice.DataBindings.Add("Text", Me.DataSource, "PURCHASE_PRICE")


        End Sub
    End Class

End Namespace